!------------------------------------------------------------------------------
!
!This program is free software; you can redistribute it and/or
!modify it under the terms of the GNU General Public License, 
!as published by the Free Software Foundation.
!
!This program is distributed in the hope that it will be useful,
!but WITHOUT ANY WARRANTY; without even the implied warranty of
!MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
!GNU General Public License for more details.
!
!You should have received a copy of the GNU General Public License
!along with this program; if not, write to the Free Software
!Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
!
!------------------------------------------------------------------------------

      ! Variables in ObjGOTM%Export
      nullify(tke)   
      nullify(eps)   
      nullify(L  )      
      nullify(num)   
      nullify(nuh)    

      !Variables in ObjGOTM%Trid
      nullify(au)          
      nullify(bu)           
      nullify(cu)        
      nullify(du)     
      nullify(ru)       
      nullify(qu)         

      ! Auxiliary Variables in ObjGOTM
      nullify(cmue1)
      nullify(cmue2)
      nullify(tkeo)
      nullify(as)
      nullify(an)
      nullify(xRf)  

!----------------------------------------------------------------------------------------------------------
!Copyright (C) 2000 - GOTM code.
!----------------------------------------------------------------------------------------------------------
